home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / Z-Miscellaneous / (c)z4.d64 / keyboard beep.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  440b  |  16 lines
  1. 10 FORI=49152TO49228:READA:CK=CK+A:POKEI,A:NEXT
  2. 15 SYS49152:NEW
  3. 20 DATA 120,169,013,141,020,003
  4. 25 DATA 169,192,141,021,003,088
  5. 30 DATA 096,165,251,197,197,208
  6. 35 DATA 004,201,064,208,026,165
  7. 40 DATA 197,201,064,240,020,162
  8. 45 DATA 006,189,070,192,157,000
  9. 50 DATA 212,202,016,247,169,015
  10. 55 DATA 141,024,212,169,004,133
  11. 60 DATA 252,165,197,133,251,198
  12. 65 DATA 252,165,252,208,008,173
  13. 70 DATA 004,212,041,254,141,004
  14. 75 DATA 212,076,049,234,000,050
  15. 80 DATA 000,000,033,064,244
  16.